﻿Namespace Reports


    Public Class R_02_00502

        Public Sub CreateDataBindings()

            Me.XrTableCell_AssetBarcode.DataBindings.Add("Text", Me.DataSource, "ASSET_BARCODE")
            Me.XrTableCell_AssetName.DataBindings.Add("Text", Me.DataSource, "ASSET_NAME")
            Me.XrTableCell_StaffName.DataBindings.Add("Text", Me.DataSource, "CURRENT_PRINCIPAL__STAFF_NAME")
            Me.XrTableCell_Remarks.DataBindings.Add("Text", Me.DataSource, "REMARKS")

        End Sub

    End Class
End Namespace